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RECURSIVE FUNCTIONS OF SYMBOLIC EXPRESSIONS AND THEIR COMPUTA’ 

« 

BY MACHINE - - 

by J* McCarthy 
An Error in Mono 8 


The definition of eval given on page 15 has two errors, 

one of which is typographical and the other conceptual. The 

11 * 

typographical error is in the definition of evcon where 
S *X—>** and "T~->" should be interchanged. 

The second error is in evlam. The program as it stands 
will not work if a quoted expression contains a symbol which 
also acts as a variable bound by the lambda. This can be 
corrected by using Instead of subst in evlam a function subsq 
defined by 

8ubsq«Nf rx»yi*Jirn , ullf*iH^/t l®toraj[aJ—> 
jy«*z—>x • 1—’zjjfirstfz] »QU0TE-“*Z5 1 —* 
combine fsubsqfxfy*f irst£sj 1 j subsq £xjy;reatj’*3 11 
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Memo 8 

RECURSIVE FUNCTIONS OF SYMBOLIC EXPRESSJONS AND THEIR GOMPOTATIOJ 


BY MACHINE 
by J. McCarthy 

The attached paper is a description of the LISP system 
starting with the machine-independent system©f recursive 
functions of symbolic expressions« This, seema to be a bettei 
point of view for looking at the system than the original 
programming approach. After revisit will be sub 

mitted for publication in a logic or c««rut||f Journal. 

This memorandum contains only the sabdplie independent 
parts of the system. • rTliis’■ 

the computer and the system for representii^-S-Ainctioha by - 
computer subroutines will be added. 









RECURSIVE FUNCTIONS OF SYMBOLIC EXPRESSIONS AND THEIR 

COMPUTATION BY MACHINE 

t 

by John Me. Car thy, MIT Computation Center 


1» Introduction 

■a im ■■i riin u. jiiwunfipiltii i pwirn i t“ ■ i —*■-f‘ 

A programming system called LISP (for LI£$ Processor) 
has been developed for the IBM 7<>4 computer by the Artificial 
Intelligence Group at MIT. The system was designed to facili¬ 
tate experiments with a proposed system called the Advice Taker 
whereby a machine could be instructed in declarative as well 
as Imperative sentences and could exhibit "common sense" in 
carrying out its instructions* The original proposal for the 
Advice Taker is contained in reference I. The main require¬ 
ment was a programming system for manipulating expressions 
representing formalized declarative and imperative sentences 
so that the Advice Taker system could make deductions. 

The development of the LISP system went through several 
stages of simplification in the course of its development and 
was eventually seen to be based on a scheme for representing 
the partial recursive functions of a certain class of symbolic 
expressions. This representation is independent of the IBM 704 
or any other electronic computer and it now seems expedient 
to expound the system starting with the class of expressions 
called S-expressions and the functions called s-functions. 

In this paper, we first describe the class of S-expressions 
and S-functions. Then we describe the representation of 
S-functions by S-expressions which enables us to prove that 
all computable partial functions have been obtained, to obtain 
a universal s-function, and to exhibit a set of questions 
about S-expressiot4B which cannot be decided by an S-functi©n» 

We describe the representation of the system in the IBM 704, 
including the representation of S-expressions by list structures 
similar to those used by Newell, Simon, and Shaw (see refer¬ 
ence 2), and the representation of S-functions by subroutines 
Finally, we give some applications to symbolic calculations 
including analytic differentiation, proof checking, and 
compiling Including a description of the present status of 
the LISP compiler Itself which is being written In the system. 

Although we have not carried out the development of 
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recursive function theory in terns of S-functions and their 
representation by S-expressIons beyond the simplest theorems, 
it seems that femulation of this theory in terms of S“func¬ 
tions has important advantages. Devices such as Ctodel number¬ 
ing are unnecessary and so is the construction of particular 
Turing machincis, (These constructions are all artificial in 

terms of what is intended to be accomplished by them). The 

. » 

advantage stems from the fact that functions of symbolic 
expressions are easily and briefly described as S-expresslons 
and the representation of S-funcfcions by S-expressiona is 
trivial. Moreover, in a large class of cases the S-expressioo 
representations of S-functions translate directly into effi¬ 
cient machine programs for the computation of the functions. 
Although, the functions described in the manner of this paper 
include all computable functions of S-expressions, describe 
many important processes in a very convenient way, and compile 
Into fast running programs for carrying out the processes; 
there are other kinds of processes whose description by S-func- 
tlcns is inconvenient and for which the S-functions once found 

9 * 

do not naturally eomplle into efficient programs. For this 
reason, the LISP system includes the possibility of combining 
S-functions into Fortran or IAL-Ilke programs. Even this 
will not provide the flexibility of description of processes 
hoped for from the Advice Taker system which is beyond the 
scope of this paper. 

2. Recursive Functions of Symbolic Expressions 

In this section we define the s-expressions and the 
S-functions. (Actually they arc- partial functions. The 
distinction between a partial function and a function that 
the former need not be defined for all arguments because, for 
example, the computation process defining it may not terminate») 

2.1. S-expressions 

The expression with which we shall deal are formed 
using the special characters ", tJ and "(" and ")" andean 
infinite set of distinguishable atomic symbols Pj^Pg^Pj# u * 00 
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3d according 


to the following 


recursive rules* . . 

.1. The atomic symbols pg etc*are S-expresaions 

■ ' 2»- A null expression-/its also admitted* 

3* an S-expression so is (e). 

4* if e x and (e 2 ) are S-expressions so is (a^Og) 

In what follows we shall use sequences of capital Latin 
letters as atomic symbols. Since we never juxtapose them with¬ 
out intervening commas they cannot cause confusion by running 
together. Some examples of S-expressions ares 

AB 


(ab*a) 

(ab,a,,0, ) 

((ab,c)/a,(bc s (b,b))) 

2.2 Elementary functions and predicates * 

Tii@ functions we shall, need are built up from certain 
elementary ones according to certain recursive rules. 

There are three elementary predicates t 

1. null Cel c 

null Cel is true If and only if S-expreasion e is the 
null expression^, (We shall use square brackets and semi-colons 

for writing functions of S-expressiohs sitee l^Pentheaes and 

commas have been pre-empted. When writing about functions in 
general we may continue to use parentheses and commas*) 

2. atom fe] 

g. torn net is true if and only if the S-expression is 


an atomic symbol* 

3* P^Pg 

p *p s is defined only when and p 2 are both atomic 
symbols in which case it is true If and- only if they are the 
same symbol* This predicate expresses the distinguishability 

of the symbols * 

There are three basic functions of S-expresslons whose 


values are S-expressions. 

4, first M 

first [<3 is defined for 3-expressions which are 
neither null nor atomic* If e has the form * bepe e i 

is an expression, tbsn first (b) **e^* e haa tlte form (®j) 
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dcain we have first fe) «e 
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rest j;&J is also defined for S-expressions which are 
neither null nor atomic. If e has the form fe^,eg) where e^ 
is an S-expresslon, then restfje] *(e 2 ). If e has the form (e-,) 
where e, is an S-expreasion we have rest fftl t *J\* 

Some examples ares 
rest [(A,B]jj ®{B) 

restX(A)J*-A- 

rest Q A,B,C )J »(B,C) 

6„ combine lb-, 

combine je^je 2 J is defined when is not atomic. 

When has the form (eJ, then combineJe^jegl^e-^e^) 
When @2 is J\m<q have combine je^j^/^Ce^) . 

Some examples are: 
combine jji ;/fJs( a ) 

combine jj(A,B);(B,C)J==( (A ,B),B»C) 

The functions first, rest and combine are related by the 


relations 


first 


rest 


e * A 
*1 #“( 


a i WIUI/J.UO l e l*®2ll -2 

eomblneffirstfe] ,re B t£eJ]-e 
whenever all the quantities Involved are defined. 


2,3 Punetional Expressions and 
elementary functions by composition. 

Additional functions may be obtained by composite the 
elementary functions of the preceding sectiono These functions 

are described by expressions in the should 

not be confused with the S-expresalong beingraanipulated. For 
example, the expression first[rest [ej] denotes the second sub¬ 
expression of the S-expression e, e„g. first|rest£(A,B,C)J J*B. 

In general compositions of first and rest give sub-expressions of 
an S-expression in a given position within the expression and 


formed from the 






compositions of combine form s-expressions from their sub- 
expressions > For example, combine [xi combinefy*combineJ J J 
forma & sequence of three terms from the terms, e.g. combine 
r A?combine£(B,C);combine£A,A3 ]J*(A,(B,C),A) * 


an 


order to be able to name compositions of functions and 
not merely functional expressions (forms) we use the Church 
A -notation. If£i 3 a functional expression and Xj,...*^ are 
variables which may occur ln£, then xffx^ .. .,xj , ] denotes 
the function of n variables that maps x-p *. * ,x n into£ . por 
example, x£f*J, first [rest [xjjha the function which selects the 

second element of a list and we have X rM ;fIr?t£reat £*Jj J £ (A , 

[ B,C 1,A)}»£b,C x£C x}$£a,B Jia the constant function that 

maps every S~expreseion into 

The variables occurring in the list of a X-expresaion are 
bound and replacing such a variable throughout a X-expression 
by a new variable does not change the function represented. 

Thus >C£*yJ, combinef .x,combinefy,A]3Jis the same function as 

x[£u,vj r combine [u, combine J Jbut different from X£{y,X 
combine [x ,combine£y,/j J J J * 

If some of the variables in a functional expression or 
form are bound by Xls and others are not, we get a function 
dependent on parameters or from another point of view a form 
whose value is a function when values have been assigned to 


the variables. 

2 A conditional Expressions 

Let P 1 ,P 2 ,...,P k be expressions representing propositions 
and let e-.,,..,© k be arbitrary expressions. lfoe expression 
[p—^e ,...p ir ^e k ] Is called a conditional expression and its 
value is determined from the values assigned to the variables 
occurring in it as follows: If the value of p x is not defined 
neither Is that of the conditional expression. If P Is defined 
and true the value of the conditional expression is that of a 1 
if the latter is defined and otherwise is undefined. If P x is 

defined and false, then the value of * «»Pg^ e k 3 ls fchat 

of [p ? -*e 2 ;...p £r *e k ]. Finally if p k is false the value of 

E e k 8' 13 . 

; An example of a conditional expression is (null [ 


atom [xU* A ? 1-* fir8 C x 31 * The Ml? ' occurring in the above 
expression Is the propositional constant ”truth" * We also use 





0 for the propositional constant ’‘falsehood*'. When used as the 
last proposition In a conditional expression ”1” may be read 


"in all .remaining cases". The expression given is a sort of 


extension of the expression f irst which is defined for all 

S-expressions . We could define a corresponding function by 
first a >£O jj jnull[xJ-^/\iatomfjtj-Ht4l 1 ‘ i ^ ifiP8t & 3]]* 

It is very important to note that for a conditional 


expression to be defined it is net necessary for all of Its 


sub-expressions to be defined 


.. is defined, the conditional expression [pj—.. .p^— 54 ] 


If p, is defined and true and 

e 

is defined even if none of the other p's or e's is defined. 

If p, is defined and false, p 2 is defined and true and e 2 is 
defined, the expression is defined even if e 1 and all the other 


p 9 s and e's are undefined. 

The propositional connectives/] andVand may be defined 

V _ 

in terras of conditional expresslcns. We have P]A p 2*i® > ;C'"*i p 2 
—> 1 , 1—103 * and p^x/ p 2 «{ p-j—el,pg--*l, 1 — *0] and <p*[ p—*0,1*-*1] 

There is a slight difference between the connectives defined 
this way and the ordinary connectives. Suppose that p^ is 
defined and true but p 2 is undefined. Then p-jV/Pg ls defined 
and true but Pg^P-i undefined. 

2.5 Recursive Function Definitions 

The functions which can be obtained from the elementary 


functions and predicates by composition and conditional expres¬ 
sions form a limited class. As we have described them they are 


not defined for all S-expressions but if we modified the 
definitions of the elementary functions so that the undefined 
cases are defined in some trivial way, as in the example of the 
previous section, they would be always defined. 

Additional functions may be defined by writing definitions 


of the form, 

f^f j£1 where the expression£.may contain the 

symbol f itself. A function f defined in this way is to be 
computed for a given argument is to be c deputed by substitution 
of the argument into the expression and attempting to evaluate 
the resulting expression. When a conditional expression is 
encountered we evaluate p 6 s until we find a true p and then 
evaluate the corresponding e. No attempt is made 





to evaluate later p J s or any e except the one corresponding 
to the first e« It may happen that in evaluating for given 
values of the variables it is unnecessary to evaluate any 
expression involving the defined function f. In this case, 
the evaluation may be completed and the function defined for 
this argument. If expressions involving f do have to be 
evaluated we substitute the arguments of f and again proceed 
to evaluate 9 The process may or may not terminate. *For 
those arguments for which the process does terminate the 
function is defined. 

We shall illustrate this concept by several examples: 

t 

1« Our first example is a function which gives the 
first symbol of an expression. 

We define c 

f f CxJ ; fnullfVJv'atomf x}-~*x| l-*f f ff irstfx J J J J 

Let us trace the computation of ff£(((A),B),C)J. We have 
fff (((A),B),C )>fnullIC ({A) ,B),C )J watoaft ((A) ,B,C )J-*( ((A) ,B) ,C) j 
l—*f ff f irstf ((C A) ,B) ,C )JJ 

-ff£{(A),B0 r 

»fnullf( (A) ,B)J*/atom[ ((A) »B)J-*( ( A),B) $ 1-effff irst[{ (A) 

*fff(A)J 

*. [null T( A) J vatomf ( A )}— M A) j 3r-»ff ffIrstf ( A )J ] ] 

'“f ff A] 

* [nul 1 [ A^ya t om [a}—>> A j l~d f f ff ir a t [ A J J J 

»A 

* Note that it does not matter that first A occurring in the 

next to last step is undefined. 

2. The second example is a function which gives the result 
of substituting the expression x for the symbol y in the expres¬ 
sion s. We define 

subBt*>Xffxiy;sJ i£ nullfsj—stomf sj—i£y*B— fx$ 1 * sj|; I""'? 

comb ine [subs t fx j y i f ir s tfsj J{ subs t£x i y # r e s t/’s J J J J J 
We shall illustrate the application of this definition by 
computing substf(A,B)iXi({X»A),C)J. In order to make the tracing 
shorter we shall give the situation at eachsrecursion and leave 
it to the reader to substitute the definition of each subst 
expression and to check the determination of which case of the 
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ondltional is applicable, We have 
sufestf (A,B)} Xi (X, A) »C )] « , 

Combine' [subsC( A>B) ;Xj.(X,a) j j sabs t £( A ,B )|Xj(C)]]] 

[combine £aubet£{ A *B) | X j Xj j subat £( A»B) $ X| (A )JJ j combine^ 

subs t £{ A # B) i X | C J j subs t £( A *B) j X jf JJ 

combine [combinef(A»B) ^comblre£subst£( A#B) jX{A7»8 y bst/{A *B) 


a*-r? 


S' 







^combine rcombine£{A,B) 

-(((A*B),A),C) 

?,6 Functions with Function! as Ar guments 

m—»m«— m i m 1111—«iw» * *•**■■' ' "W* 1 •" 

If we allow variables representing functions to occur in 
expressions and create functions by Incorporating these variables 
as arguments of l s s we can define certain functions more concisely 
than without this facility. However* as we shall show later no 

additional S-functions become definables 

As an example of this facility we define a function maplist C X *^J 
where x is an 3 -e.Kpression and f is a function from S-expres- 

slons to S-expressions. We have n 

maplist*x£ [x,f) 5 £null Xx^—yf# l~*cot»bine£f [xj jmaplistjrestfxjjfJJJJ 
The usefulness of maplist is illustrated by formulas for 
the partial derivative with respect to x of expiress ions involving 
sums and products of x and other variables*■ .The S-expressions 
we shall differentiate are formed-as follows: 

1 . An atomic symbol is an allowed expression. 

2, 

, 3 ,,e n ) and (TINES, e* 1# -. .. *« n ) and represent the sum and product 
respectively of e^s „•»> e n ■ 

This is essentially the Polish notation for functions except 
that the inclusion of parentheses and commas allows functions 
of variable numbers of arguments. An example of an allowed 
expression is 


If e-jegj 03 „are allowed expressions so are (PLUS, 


(TIMES, X> (PLUS, &A) *Y) 
the conventional., algebraic note 




GA for which is 


Our differentiation formula is 
diff*xC(y,x3 i£atom£y3~»(/*3t—^*ONEj 1 
firs z £y] *PLUS—£comtoine fPLUSjmaplis 




ZERO ]v 

J>£ fa] l dif ff 


ifirstfy' 





1*9 

J, 


est fy]5 > fW» 



I maplist free 



'm 

$ 


xfwj 1 [a^w 




e t' rwi •, ^ 1. f f r? i T , st|| r w} t 

x, - 4 ^ *. 


1 



rn^lii 

J » - . 

* .1 . , • ;*• 






forraul 


sii 


derivative of the above expr 
is 


a 


omwuted by this 


(PLUS; ; (TIMES,ONE, (PLUS X,. A) /£), (T JMES, X* (PLUS,ONE,ZERO) , Y) * 
(TIMES,X,(PLUS,X,A),ZERO)) 


2,7 Labelled Expressions 

i mini—■—m'wiln—iiw u ww*»«h«*iiiMi «MMi' ■ ammvi.a «wn 

The A-notation used for naming functions Is Inadequate 


for naming recursive franctions . For example, if the function 
named as the second argument of a maplist is to be allowed to 


be recursive an additional notation is required. 

We define labelfajeJ where a is a symbol and e is an 
expression to be the same as the expression e except that 
if a occurs as a sub-expression of e it is understood to 


refer to the expression e. The symbol a is bound in label 
£a;ej and has no significance outside this expression. Label 
acts as a quantifier with respect to its first argument but a 


quantifier of a different sort from A. 
label jfsubst $ A[ [x$y§Bjf [tmllfe 


As an 





ly~B-*)x; l-f bJ } 1—♦combinef substrxiyjf irstfsJJ 
subBtrxjyirestCs}J jl l 7 
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is a name suitable for inclusion In a maplist of the substitu¬ 
tion function mentioned earlier. 

2.8 Computable Functions 

In this section we shall show that all functions compu¬ 
table by Turing machine are expreg sable as S-functions. If, 

S' 

as we contend, S-functions are a wore suitable device for 
developing a theory of computability than Turing machines* 
the proof in this section is out cf place and should be re¬ 
placed by a plausibility argument similar to what is called 
"Turing's thesis" to the effect that S-functions satisfy our 
Intuitive notion of effectively computable function. The 
reader unfamiliar with Turing machines should skip this section. 

Nevertheless, Turing machines are well entrenched at present 
so we shall content ourselves with showing that any function 
computable by Turing machine is ac S-function. This is done 
as follows; 

1. We give a way of describing the Instantaneous con¬ 
figurations of a Turing machine calculation by an S-expression. 
This £-expressIon must describe the Turing machine, its 






•io— 


internal state, the tape, and the square on the tape being 




^"N 


0. We give an S-function succ- whose argument is an 
instantaneous configuration and whose value is the immediately 
succeeding configuration If there is one and otherwise is 0 . 

3 , We construct from succ another S-functionturing 
whose arguments are a Turing machine, with a canonical initial 
state and an initial tape in a standard position and whose 

1 

value is defined exactly when the corresponding Turing machine 
calculation terminates and in that case is the final tape. 

We shall consider Turing machines as given by sets of 
quintuples» Each quintuple consists of a state, 
a symbol read, a symbol to be printed, a direction of motion 
and a new state. The states are represented.'by a finite set 
of symbols, the symbols which may occur by another finite set 
of symbols (it doean 9 t matter whether these sets overlap) and 
the two directions by the symbols "I." and "R". A quintuple is 
then represented by an S-expression (st,sy,nsy,dir,nst)„ 

The Turing machine is represented by an S-expression. (1st, 
blank,quinl,...,quink) where 1 st represents the canonical 
initial state, blank is the symbol used for a blank square 
(squares beyond the region explicitly represented in the 
S-expression for a tape are assumed to be blank and are read 
that way when reached). As an example we give the representa¬ 
tion of a Turing machine which moves to the right on a tape 
and computes the parity of the number of l'a on the tape ignoring 
0 8 s and stopping when it comes to a blank square: 
(0 ,b;(0,0,R,R,0),(0,1,B,R,1),(0,B,0,H,2),(1,0,B,R,1),(1,1,B,R > 0}, 
(1,B,1,R,2)) 

The machine is assumed to stop if there is no quintuple with a 
given symbol state pair so that the above machine stops as coon 
as It enters state 2 . 

A Turing machine tape is represented by an S-expression as 

* 

follows; The symbols on the squares to the right of the scanned 
square are given in a list v» the symbols to the left of the 
scanned square in a list uand the scanned symbol as a quantity w. 
These are combined in a list (w,u,v). Thus the tape .. .bbllOlOllQb 
is represented by the expression 

(0,(1 ,i,l,b,b),(1,1,0,b)) 










*i 1 

1 i *** 

-5c 




,we adjoin the state to this triplet to make 'a quadruplet 
(a*«.,u. f v) which desuribes the instantaneous configuration of a 
machine 

The function succ[m;cj whose arguments are a Turing machine 
m and a configuration c has as value the immediately suc¬ 
ceeding configuration of c provided the state-symbol pair Is 
listed among the quintuplets of m and otherwise has value zero. 

aucc is defined with the aid of auxiliary functions. The 
first of these find£stjayjqsJ given the triplet (nsyjdir;nst) 
which consist of the last 3 terms of the quintuplet of m which 
contains (st,sy) as its first two elements, The recursive 
definition is simplified by defining find [stjsyjqs] where 
qe^resfc[restCm]Jsince qs then represents the list of quintuplets 
of m. We have findfst|sy?qs3=*(null/*q83~-^0ifirat|flrst£q8jj 
*sVjfirst£reat£fir8t £qs] ] ] ®sy-*rest [rest[ first [v*]]]} 1—*find 
jst?sy,rest fqsjj] 

The new auxiliary function Is move fmjnsyjtapejdirJwhich 

gives a new tape triplet obtained by writing nay on the scanned 

* 

square of tape, and moving in the direction dir. 
m<ve [w t nsy; tape; d irj ~ [dir*L~--» combinef £ 

mil 1 [first fres t ftapej J ]—? first [rest [m JJ#1—*f irst [ f irst[rest£tapej j J 
combine f[nu.l iff IratfrestftapeJ}}-- */! |1—> 
restffirstfresfcftapeJJJjfCombineCcoiabinefnsy; 
first £rest[restftapej]j Ji^]]]l;diraR-—? 
combine[ [ nul1[flrs t fres t fres t [tape ]]]] * 

first [rest fmj jj Mf ire t[f irstfrestfrestftapejj] JJj 
combine [combinefnsyj firatfrestjftapej]]i^ 
comblnef f nullff irst [rest fresl [tapej J j J—^4 11 —* 

res t[firstjfrest fr« S tftapej]]3JjyJ_7jJ 

The reader should not be alarmed at the monstrous size of 
the last formula. It rises mainly from the compositions of first 
and rest required to select the proper elements of the structure 
representing the tape. Later we shall describe ways of writing 
such expressions more concisely. 

We now have 

succ£mjc ] « [find [first [c] i first [rest [o ]]j res t fres tfmj] ] 

«0~»011—^combine ffirs t free t fres tffind f 
firstfc] ;first£rest[c1J jrestfrestfmJJJJJ)^ 

move[mjfirst[flndffirst [a] ?flrstfrest fcjj 

rft8 t: [VestAn] 1 ] ]:■ reot A} first.[rest/ findf 
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Lisp Self-applied 
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The S-functions have been 


described by a class of expree 


siono which has been informally introduced. Let us call these 
expressions p-expreasions. If we provide a way of translating 
F-expressions into S-expressions, we can use S-functions to 
represent certain functions and predicates of S-expresslons* 
r?irst we shall describe this translation. 

3»1 Representation of S-functions as S-expreaslons, 

The representation is determined by the following miles, 

1. Constant S-expressions can occur as parts of the 

P-expressions representing S-functions. An S-expression is 
represented by the S-expression„ (QUOTE,£) 

2. Variables and function names which were represented 
by strings of lower case letters are represented by the cor¬ 
responding strings of the corresponding upper case letters * 

Thus we have FIRST, REST and COMBINE, and we shall use X,Y 
etc. for variables. . 

3 . A form is represented by an S-expression whose first 

term is the name of the main function and whose remaining terms 

are the arguments of the function. Thus combine£first£xj; 

reet[x]j is represented by (COMBINE,(FIRST,X),(REST,X)) 

Jf. The nun S-expression Ala named Nil.. . . m 

h . The truth values 1 and 0 are denoted by T and F. 

The conditional expression 


writef ; p 2“* e 2 * 

is represented by 


♦ © 9 J> 


P 


e 


k 


J 


r 

(COND, (p^,©^)»(Pg>#®2)»* ° 0 * 3 

6. ]?£] ifi represented by (LAMBDA, (X,..., *)s£ ) 

7. label£^ is represented by (LABEL 

8. x*y is Represented by (EQ,X,Y) 

* i 

With these Conventions the substitution function mentioned 


earlier whose F-expression is 

labelfsubst ,* *[[ x $y $ a] ? £null[aj-yfeatom[ aj—p 

Jy* 2 —jot j 1— 1 1—^combinefsubst/xjy j f irs tf sj ] j 
substfxjyjrestfaJJJJ JJ 
is represented by the S-expresslcn. 

(LABEL,STBST, (LAMBDA, (X,Y,Z),(COND,( (NULL, 

3),NIL),((AT0M,2),(C0ND,((EQ,Y,a),X),(l,S)}), 
(1, (COMBINE, (SUBSP,X,Y, (PIRST,2)), 


{ STJEBT, I , Y j, i BEST , Z ) )))))) 




This notation is rather formidable for a human to read, 
and vrhen we come to the computer form of the system we will 
see how it can be made easier by adding some features to the 
read and print routines without changing the internal compu- 
tation processes <• 

^.2. A Function of S-expressions w hich is not an S-i^nctj£n 

It was mentioned in section 2.5 that an S-function is not 
defined for values of its arguments for which the process of 
evaluation does not terminate. It is easy to give examples 
of S-functions which are defined for all arguments, or examples 
which are defined for no arguments, or examples which are 
defined for some arguments. It viould be nice to be able to 
determine whether a given S-functlon is defined for given 
arguments. Consider, then, the function def0P;s} whose value 
is 1 if the S-funotion whose corresponding 3-expression is f 
is defined for the list of arguments s and is zero otherwise. 

We assert that def[f* a] is not an s-function. (If we 
assume Turing machine theory thin is an obvious consequence 
of the results of section 2.8, but in support of the contentions 
that S-functions are a good vehicle for expounding the theory 
of recursive functions we give a separate proof)- 


Theorem: def $ajis not an S-function. 

Proof: Suppose the contrary. Consider the function 

g-Afff J;[ def [f; fj~*1, 2r-+f: Irs t[^ J j j 

If def were an S-function g would also be ab s-function. 
For any S-functlon u with S-expression u g ju^J is 1 if u£u’J 
undefined and is undefined otherwise. 

Consider now g£g‘J where g J is an S-expression for g. Assuiae 
first that g (g * j were defined. This is precisely the condi¬ 
tion that g‘ be the kind of S-expression for which g is 
undefined, eontrawise, were g£g*Jundefined g* would be the 

kind of s-expreasion for which g is defined. 

Thus our assumption that def£f js~|i8 an S-function leads 

to a contradiction. 

The proof is the same as the corresponding proof in 
Turing machine theory. The simplicity of the rules by which 
S-functions are represented as S-expressions makes the develop- 
ment from scratch simpler, however. 
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3.3 The Universal S-Punction , App ly 

M —1 1 I I IIPI - « ■will l « . 1 IHHM — l ilU r « - 

• • ' ...... • 

There Is an S-function apply such thet if f is an 
S-expression for an S-function(,£>and args la a list of the 

] - /.;"•• :• p.“.. ' ' 

form (argl,.,. ,arg n) where argl,-— # arg u are arbitrary 
8-expressions then apply ff ,arga) and<-p/arglj.. * ;arg n) 
are defined for the same values of argl,.,*»arg n and are 
equal when defined. 

apply is defined by 
apply ffj argsj »eval {combine ff |argsjj 
eval is defined by 
eval£e}*<£ 

first £e] ®NULL—ifnull fevalff irstfres t/ej] JJ^T* >-*pj 
first £e] *ATQl1~*fatom£eval£f irs tfrest £e]J] j}~*T $ 1—*Pj 
first jej »EQ~ J >eval£f irst frestfejjj -evalf first frestfres t fej 3 ] J~*T j 
1—9pJ 

f irst [e] *QUOTE-^firstfrest£eJJi 

first fe] «pIRSTfirst £eval ffirs t[restfejJJ j; 

first fe] «REST—*rest [evalf first [rest [e] ]] ]j 

f irstfej »COMBINE—aeombinefeval ffirstfreatfeJJJpevalf first {rest/rest 

WJJJJj 

f irst {e] wCON3>-^ evcon frestf ej ]j 

f ir 3 1 [ f ir s tfej J »LAMBDA~^evlam£f irs t £res tffirs t feJjJj firs t /rest £res t 
ffirst£eJJ]]*rest fe]J j 

first ff irstfejJ =»LABEIrdeval£comolne fsubst {first fej; first [rest 
£f irstfej] J {firstfrestfrestftirst (eJJJJJjrestfeJJJJ 
where; evcon £c] * jevalffirst£first £c]]J»l~>J»eval£firstfrestff irs tfcJJJJ$ 

T—?e vcon £res t £ej ]] 

and 

evlarafvars;exp;args] *« fnullfvarsj—frevalfexpj g 1—)evlam£ 

rest fvaraj ; sub31 ff irs t farga] g f irs tfvars] gexpjgreat {argsj J j 
The proof of the above assertion is by induction on the 
subexpressions of e. The process described by the above 
functions is exactly the process used in ifee hand-worked 
examples of section 2.5a 







'I* * 



r 




V 


-l6~ 

4. Variants of Lisp 

4HW4HMW «2lMBii24BKk*wKMh 

There are a number of ways o r defining functions of 
symbolic expressions which are quite similar to the system 
we have adopted. Each of them involves three basic functions* 
conditional expressions and recursive function definitions, 
but the class of expressions corresponding to S-expreaslons 
differs and so do the precise definitions of the functions. 

We shall describe two of these variants* 

4.1 Linear Lisp 

The L-expressions are defined as follows: 

1. A finite lint of characters is admitted. 

2. Any string of admitted characters is an L-expres- 
sion. This includes the null string denoted by^/L 

There are three functions of strings 

1. first [x] is the first character of the string x. 
first{lA} is. undefined. 

For example, first £abC]-'A. 

2. rest[x') is the string cf characters remaining when 
the first character of the string Is deleted. 

rest CA)ls undefined„ 

For example, rest [ABC] »BC 

3. combinefx;yl is the string formed by prefixing the 

character x to the string y. 

For example, combine£ a;Bc 3“ABG 
There are three predicates on strings 

1. char j)c], x is a single character 

2. nulljx], x is the null string 

3. x»y, defined for x and y characters. 

The advantage of linear Lisp Is that no characters are 
given special roles as are parentheses and comma in Lisp. 

This permits computations with any notation which can be 
written linearly. The disadvantage of linear Lisp Is that 
the extraction of sub-expressions is a fairly involved rather 
than an elementary operation. It is not hard to write in 
linear Lisp functions corresponding to the basic functions of 
Lisp so that mathematically linear Lisp Includes Lisp. This 

turns out to be the moat convenient way of programming more 

♦ • 

complicated manipulations. However, It turns out that if the 
functions are to be represented by computer routines Lisp is 











